Amiga Plus 1995 #5 & #6/Amiga Plus CD - 1995 - No. 5 and 6.iso/pd/programmierung/triton/blitzbasic/bbincludes/libraries/triton.asc

Text File | 1995-08-25 | 38KB | 1,299 lines

#LIBRARIES_TRITON_H=-1
;**
;** $VER: triton.h 4.39 (24.6.95) - triton.bb2
;** Triton Release 1.3
;**
;** triton.library definitions
;**
;** (C) Copyright 1993-1994 Stefan Zeiger
;** All Rights Reserved
;** conversion to BlitzBasic2 by Philipp Lonke and Rupert Henson
;** Blitz2-Triton-Support and Infos ask [e-mail]
;** or ask in the blitz mailing list. ** READ THE DOCUMENTATION! **
;**

; NOTE: One line of a macro cannot exceed 128 chars
; (just use extra macros - see LK1 - List Kludge 1 etc.)

Macro TRITONNAME
"triton.library"
End Macro

#TRITON10VERSION=1
#TRITON11VERSION=2
#TRITON12VERSION=3

#INTUI_V36_NAMES_ONLY=-1

; this here is an addition to the amigalibs.res where this
; newtype is not defined

NEWTYPE .AppWindow
  *aw_PRIVATE.b
End NEWTYPE

;/* ////////////////////////////////////////////////////////////////////// */
;/* //////////////////////////////////////////////////////////// Macros // */
;/* ////////////////////////////////////////////////////////////////////// */

;/* Project */
;Macro ProjectDefinition(name)
;End Macro

Macro EndProject
#TAG_END
End Macro

Macro WindowTitle
#TRWI_Title,`1
End Macro

Macro ScreenTitle
#TRWI_ScreenTitle,`1
End Macro

Macro WindowID
#TRWI_ID,`1
End Macro

Macro WindowFlags
#TRWI_Flags,`1
End Macro

Macro WindowPosition
#TRWI_Position,`1
End Macro

Macro WindowUnderscore
#TRWI_Underscore,`1
End Macro

Macro WindowDimensions
#TRWI_Dimensions,`1
End Macro

Macro WindowBackfillWin
#TRWI_Backfill,#TRBF_WINDOWBACK
End Macro

Macro WindowBackfillReq
#TRWI_Backfill,#TRBF_REQUESTERBACK
End Macro

Macro WindowBackfillNone
#TRWI_Backfill,#TRBF_NONE
End Macro

Macro WindowBackfillS
#TRWI_Backfill,#TRBF_SHINE
End Macro

Macro WindowBackfillSA
#TRWI_Backfill,#TRBF_SHINE_SHADOW
End Macro

Macro WindowBackfillSF
#TRWI_Backfill,#TRBF_SHINE_FILL
End Macro

Macro WindowBackfillSB
#TRWI_Backfill,#TRBF_SHINE_BACKGROUND
End Macro

Macro WindowBackfillA
#TRWI_Backfill,#TRBF_SHADOW
End Macro

Macro WindowBackfillAF
#TRWI_Backfill,#TRBF_SHADOW_FILL
End Macro

Macro WindowBackfillAB
#TRWI_Backfill,#TRBF_SHADOW_BACKGROUND
End Macro

Macro WindowBackfillF
#TRWI_Backfill,#TRBF_FILL
End Macro

Macro WindowBackfillFB
#TRWI_Backfill,#TRBF_FILL_BACKGROUND
End Macro

Macro CustomScreen
#TRWI_CustomScreen,`1
End Macro

Macro PubScreen
#TRWI_PubScreen,`1
End Macro

Macro PubScreenName
#TRWI_PubScreenName,`1
End Macro

;V4 entry QuickHelp

Macro QuickHelpOn
#TRWI_QuickHelp,`1
End Macro


;/* Menus */
Macro BeginMenu
#TRMN_Title,`1
End Macro

Macro MenuFlags
#TRMN_Flags,`1
End Macro

Macro _MenuItem
#TRMN_Item,`1,#TRAT_ID,`2
End Macro

Macro MenuItemC
#TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKIT,#TRAT_ID,`2
End Macro

Macro MenuItemCC
#TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKED,#TRAT_ID,`2
End Macro

Macro BeginSub
#TRMN_Item,`1
End Macro

Macro MenuItemD
#TRMN_Item,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2
End Macro

Macro _SubItem
#TRMN_Sub,`1,#TRAT_ID,`2
End Macro

Macro SubItemD
#TRMN_Sub,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2
End Macro

Macro ItemBarlabel
#TRMN_Item,#TRMN_BARLABEL
End Macro

Macro SubBarlabel
#TRMN_Sub,#TRMN_BARLABEL
End Macro

;/* Groups */
Macro HorizGroup
#TRGR_Horiz,0
End Macro

Macro HorizGroupE
#TRGR_Horiz,#TRGR_EQUALSHARE
End Macro

Macro HorizGroupS
#TRGR_Horiz,#TRGR_PROPSPACES
End Macro

Macro HorizGroupA
#TRGR_Horiz,#TRGR_ALIGN
End Macro

Macro HorizGroupEA
#TRGR_Horiz,#TRGR_EQUALSHARE OR #TRGR_ALIGN
End Macro

Macro HorizGroupSA
#TRGR_Horiz,#TRGR_PROPSPACES OR #TRGR_ALIGN
End Macro

Macro HorizGroupC
#TRGR_Horiz,#TRGR_CENTER
End Macro

Macro HorizGroupEC
#TRGR_Horiz,#TRGR_EQUALSHARE OR #TRGR_CENTER
End Macro

Macro HorizGroupSC
#TRGR_Horiz,#TRGR_PROPSPACES OR #TRGR_CENTER
End Macro

Macro HorizGroupAC
#TRGR_Horiz,#TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro HorizGroupEAC
#TRGR_Horiz,#TRGR_EQUALSHARE OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro HorizGroupSAC
#TRGR_Horiz,#TRGR_PROPSPACES OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro VertGroup
#TRGR_Vert,0
End Macro

Macro VertGroupE
#TRGR_Vert,TRGR_EQUALSHARE
End Macro

Macro VertGroupS
#TRGR_Vert,#TRGR_PROPSPACES
End Macro

Macro VertGroupA
#TRGR_Vert,#TRGR_ALIGN
End Macro

Macro VertGroupEA
#TRGR_Vert,#TRGR_EQUALSHARE OR #TRGR_ALIGN
End Macro

Macro VertGroupSA
#TRGR_Vert,#TRGR_PROPSPACES OR #TRGR_ALIGN
End Macro

Macro VertGroupC
#TRGR_Vert,#TRGR_CENTER
End Macro

Macro VertGroupEC
#TRGR_Vert,#TRGR_EQUALSHARE OR #TRGR_CENTER
End Macro

Macro VertGroupSC
#TRGR_Vert,#TRGR_PROPSPACES OR #TRGR_CENTER
End Macro

Macro VertGroupAC
#TRGR_Vert,#TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro VertGroupEAC
#TRGR_Vert,#TRGR_EQUALSHARE OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro VertGroupSAC
#TRGR_Vert,#TRGR_PROPSPACES OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro EndGroup
#TRGR_End,0
End Macro

Macro ColumnArray
#TRGR_Horiz,#TRGR_ARRAY OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro LineArray
#TRGR_Vert,#TRGR_ARRAY OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro BeginColumn
#TRGR_Vert,#TRGR_PROPSHARE OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro BeginLine
#TRGR_Horiz,#TRGR_PROPSHARE OR #TRGR_ALIGN OR #TRGR_CENTER
End Macro

Macro BeginColumnI
#TRGR_Vert,#TRGR_PROPSHARE OR #TRGR_ALIGN OR #TRGR_CENTER OR #TRGR_INDEP
End Macro

Macro BeginLineI
#TRGR_Horiz,#TRGR_PROPSHARE OR #TRGR_ALIGN OR #TRGR_CENTER OR #TRGR_INDEP
End Macro

Macro EndColumn
!EndGroup
End Macro

Macro EndLine
!EndGroup
End Macro

Macro EndArray
!EndGroup
End Macro

;/* Display Object */
Macro QuickHelp
#TRDO_QuickHelpString,`1
End Macro

;/* Spaces */
Macro SpaceB
#TROB_Space,#TRST_BIG
End Macro

Macro Space
#TROB_Space,#TRST_NORMAL
End Macro

Macro SpaceS
#TROB_Space,#TRST_SMALL
End Macro

Macro SpaceN
#TROB_Space,#TRST_NONE
End Macro

;/* Text */
Macro TextN
#TROB_Text,0,#TRAT_Text,`1
End Macro

Macro TextH
#TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_HIGHLIGHT
End Macro

Macro Text3
#TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_3D
End Macro

Macro TextB
#TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_BOLD
End Macro

Macro TextT
#TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_TITLE
End Macro

Macro TextID
#TROB_Text,0,#TRAT_Text,`1,#TRAT_ID,`2
End Macro

Macro TextNR
!TextN{`1},#TRAT_Flags,#TROF_RIGHTALIGN
End Macro

Macro ClippedText
!TextN{`1},#TRAT_Flags,#TRTX_CLIPPED OR #TRTX_NOUNDERSCORE
End Macro

Macro ClippedTextID
!TextN{`1},#TRAT_Flags,#TRTX_CLIPPED OR #TRTX_NOUNDERSCORE,#TRAT_ID,`2
End Macro

Macro CenteredText
!HorizGroupSC,!Space,!TextN{`1},!Space,!EndGroup
End Macro

Macro CenteredTextH
!HorizGroupSC,!Space,!TextH{`1},!Space,!EndGroup
End Macro

Macro CenteredText3
!HorizGroupSC,!Space,!Text3{`1},!Space,!EndGroup
End Macro

Macro CenteredTextB
!HorizGroupSC,!Space,!TextB{`1},!Space,!EndGroup
End Macro

Macro CenteredTextID
!HorizGroupSC,!Space,!TextID{`1,`2},!Space,!EndGroup
End Macro

Macro CenteredText_BS
!HorizGroupSC,!SpaceB,!TextN{`1},!SpaceB,!EndGroup
End Macro

Macro TBK1  ; TextBox Kludge 1 needed with V4
!Space,!EndGroup,!SpaceS,!EndGroup
End Macro

Macro TextBox
!_TextBox,!ObjectBackfillB, !VertGroup, !SpaceS, !HorizGroupSC, !Space, !TextN{`1},!TRAT_ID,`2,#TRAT_MinWidth,`3,!TBK1
End Macro

Macro ClippedTextBox
!_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},!TBK1
End Macro

Macro ClippedTextBoxMW
!_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},#TRAT_MinWidth,`3,!TBK1
End Macro

Macro TextRIGHT
!HorizGroupS,!Space,!TextN{`1},!ID{`2},!EndGroup
End Macro

Macro Integer
#TROB_Text,0,#TRAT_Value,`1
End Macro

Macro IntegerH
#TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_HIGHLIGHT
End Macro

Macro Integer3
#TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_3D
End Macro

Macro IntegerB
#TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_BOLD
End Macro

Macro CenteredInteger
!HorizGroupSC,!Space,!Integer{`1},!Space,!EndGroup
End Macro

Macro CenteredIntegerH
!HorizGroupSC,!Space,!IntegerH{`1},!Space,!EndGroup
End Macro

Macro CenteredInteger3
!HorizGroupSC,!Space,!Integer3{`1},!Space,!EndGroup
End Macro

Macro CenteredIntegerB
!HorizGroupSC,!Space,!IntegerB{`1},!Space,!EndGroup
End Macro

; Kludge for longer macro in Blitz, Hope this works!

Macro IBK1
!Space,!EndGroup,!SpaceS,!EndGroup
End Macro

Macro IntegerBox
!GroupBox,!ObjectBackfillB,!VertGroup,!SpaceS,!HorizGroupSC,!Space,!Integer{`1},#TRAT_ID,`2,#TRAT_MinWidth,`3,!IBK1
End Macro

;/* Buttons */
Macro Button
#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2
End Macro

Macro ButtonR
#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK
End Macro

Macro ButtonE
#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_ESCOK
End Macro

Macro ButtonRE
#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK OR #TRBU_ESCOK
End Macro

Macro CenteredButton
!HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
End Macro

Macro CenteredButtonR
!HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
End Macro

Macro CenteredButtonE
!HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
End Macro

Macro CenteredButtonRE
!HorizGroupSC,Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK OR #TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
End Macro

Macro EmptyButton
#TROB_Button,0,#TRAT_Text,Null(""),#TRAT_ID,`1
End Macro

Macro GetFileButton
#TROB_Button,#TRBT_GETFILE,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
End Macro

Macro GetDrawerButton
#TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
End Macro

Macro GetEntryButton
#TROB_Button,#TRBT_GETENTRY,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
End Macro

Macro GetFileButtonS
#TROB_Button,#TRBT_GETFILE,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
End Macro

Macro GetDrawerButtonS
#TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
End Macro

Macro GetEntryButtonS
#TROB_Button,#TRBT_GETENTRY,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
End Macro

;/* Lines */
Macro _Line
#TROB_Line,`1
End Macro

Macro HorizSeparator
!HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
End Macro

Macro VertSeparator
!VertGroupEC,!Space,!_Line{#TROF_VERT},!Space,!EndGroup
End Macro

Macro NamedSeparator
!HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
End Macro

Macro NamedSeparatorI
!HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
End Macro

Macro NamedSeparatorN
!HorizGroupEC,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!EndGroup
End Macro

Macro NamedSeparatorIN
!HorizGroupEC,!_Line{TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!EndGroup
End Macro

;/* FrameBox */
Macro GroupBox
#TROB_FrameBox,#TRFB_GROUPING
End Macro

Macro NamedFrameBox
#TROB_FrameBox,#TRFB_FRAMING,#TRAT_Text,`1
End Macro

Macro _TextBox
#TROB_FrameBox,#TRFB_TEXT
End Macro

;/* DropBox */
Macro DropBox
#TROB_DropBox,0,#TRAT_ID,`1
End Macro

;/* CheckBox gadget */
Macro CheckBox
#TROB_CheckBox,0,#TRAT_ID,`1
End Macro

Macro CheckBoxC
#TROB_CheckBox,0,#TRAT_ID,`1,#TRAT_Value,True
End Macro

Macro CheckBoxLEFT
!HorizGroupS,!CheckBox{`1},!Space,!EndGroup
End Macro

Macro CheckBoxCLEFT
!HorizGroupS,!CheckBoxC{`1},!Space,!EndGroup
End Macro

;/* String gadget */
Macro _StringGadget
#TROB_String,`1,#TRAT_ID,`2
End Macro

Macro PasswordGadget
#TROB_String,`1,#TRAT_ID,`2,#TRAT_Flags,#TRST_INVISIBLE
End Macro

;/* Cycle gadget */
Macro CycleGadget
#TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2
End Macro

Macro MXGadget
#TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX
End Macro

Macro MXGadgetR
#TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX OR TRCY_RIGHTLABELS
End Macro

;/* Slider gadget */
Macro SliderGadget
#TROB_Slider,0,#TRSL_Min,`1,#TRSL_Max,`2,#TRAT_ID,`4,#TRAT_Value,`3
End Macro

;/* Palette gadget */
Macro PaletteGadget
#TROB_Palette,0,#TRAT_ID,`2,#TRAT_Value,`1
End Macro

;/* Listview gadget */
Macro ListRO
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
End Macro

Macro ListSel
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SELECT,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
End Macro

Macro LK3  ; {top,value}  List Kludge 3
#TRAT_Value,`2,#TRLV_Top,`1
End Macro

Macro ListSS
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SHOWSELECTED,#TRAT_ID,`2,#TRAT_Value,`4,#TRLV_Top,`3
End Macro


; Taken out because Blitz says it is too long
;Macro ListROC
;#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_READONLY OR #TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,0}
;End

Macro ListSelC
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SELECT OR #TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,0}
End Macro

Macro ListSSC
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SHOWSELECTED OR #TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,`4}
End Macro

Macro ListRON
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_READONLY OR #TRLV_NUNUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0}
End Macro

Macro ListSelN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SELECT OR #TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0}
End Macro

Macro ListSSN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SHOWSELECTED OR #TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,`4}
End Macro

Macro LK2  ; {id,top}  List Kludge 2
#TRAT_ID,`1,#TRAT_Value,0,#TRLV_Top,`1
End Macro

Macro ListROCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_READONLY OR #TRLV_NOCURSORKEYS OR #TRLV_NONUMPADKEYS,!LK2{`2,`3}
End Macro

Macro ListSelCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SELECT OR #TRLV_NOCURSORKEYS OR #TRLV_NONUMPADKEYS,!LK2{`2,`3}
End Macro

Macro LK1  ; (id,top,value) List Kludge 1
#TRAT_ID,`1,#TRAT_Value,`3,#TRLV_Top,`2
End Macro

Macro ListSSCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_SHOWSELECTED OR #TRLV_NOCURSORKEYS OR #TRLV_NONUMPADKEYS,!LK1{`2,`3,`4}
End Macro

Macro FWListRO
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
End Macro

Macro FWListSel
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SELECT,#TRAT_ID,`2,TRAT_Value,0,#TRLV_Top,`3
End Macro

Macro FWListSS
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SHOWSELECTED,!LK1{`2,`3,`4}
End Macro

Macro FWListROC
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_READONLY OR #TRLV_NOCURSORKEYS,!LK1{`2,0,`3}
End Macro

Macro FWListSelC
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SELECT OR #TRLV_NOCURSORKEYS,!LK1{`2,0,`3}
End Macro

Macro FWListSSC
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SHOWSELECTED OR #TRLV_NOCURSORKEYS,!LK1{`2,`3,`4}
End Macro

Macro FWListRON
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_READONLY OR #TRLV_NUNUMPADKEYS,!LK2{`2,`3,0}
End Macro

Macro FWListSelN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SELECT OR #TRLV_NONUMPADKEYS,!LK2{`2,`3,0}
End Macro

Macro FWListSSN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SHOWSELECTED OR #TRLV_NONUMPADKEYS,!LK2{`2,`3,`4}
End Macro

Macro LK4 ; List Kludge 4 only for a few lines below
OR #TRLV_NOCURSORKEYS OR #TRLV_NONUMPADKEYS
End Macro

Macro FWListROCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_READONLY !LK4,!LK2{`2,`3,0}
End Macro

Macro FWListSelCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SELECT !LK4,!LK2{`2,`3,0}
End Macro

Macro FWListSSCN
#TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP OR #TRLV_FWFONT OR #TRLV_SHOWSELECTED !LK4,!LK2{`2,`3,`4}
End Macro

;/* Progress indicator */
Macro Progress
#TROB_Progress,`1,#TRAT_ID,`3,#TRAT_Value,`2
End Macro

;/* Image */
Macro BoopsiImage
#TROB_Image,`1,#TRAT_Flags,#TRIM_BOOPSI
End Macro

Macro BoopsiImageD
#TROB_Image,`1,#TRAT_MinWidth,`2,#TRAT_MinHeight,`3,#TRAT_Flags,#TRIM_BOOPSI
End Macro

;/* Attributes */
Macro ID
#TRAT_ID,`1
End Macro

Macro Disabled
#TRAT_Disabled,True
End Macro

Macro ObjectBackfillWin
#TRAT_Backfill,#TRBF_WINDOWBACK
End Macro

Macro ObjectBackfillReq
#TRAT_Backfill,#TRBF_REQUESTERBACK
End Macro

Macro ObjectBackfillB
#TRAT_Backfill,#TRBF_NONE
End Macro

Macro ObjectBackfillS
#TRAT_Backfill,#TRBF_SHINE
End Macro

Macro ObjectBackfillSA
#TRAT_Backfill,#TRBF_SHINE_SHADOW
End Macro

Macro ObjectBackfillSF
#TRAT_Backfill,#TRBF_SHINE_FILL
End Macro

Macro ObjectBackfillSB
#TRAT_Backfill,#TRBF_SHINE_BACKGROUND
End Macro

Macro ObjectBackfillA
#TRAT_Backfill,#TRBF_SHADOW
End Macro

Macro ObjectBackfillAF
#TRAT_Backfill,#TRBF_SHADOW_FILL
End Macro

Macro ObjectBackfillAB
#TRAT_Backfill,#TRBF_SHADOW_BACKGROUND
End Macro

Macro ObjectBackfillF
#TRAT_Backfill,#TRBF_FILL
End Macro

Macro ObjectBackfillFB
#TRAT_Backfill,#TRBF_FILL_BACKGROUND
End Macro

;/* Requester support */
;Kludge for longer macro (again!)

Macro reqk
!WindowFlags{#TRWF_NOZIPGADGET OR #TRWF_NOSIZEGADGET OR #TRWF_NOCLOSEGADGET OR #TRWF_NODELZIP OR #TRWF_NOESCCLOSE}
End Macro

Macro BeginRequester
!WindowTitle{`1},!WindowPosition{`2},!WindowBackfillReq,!reqk,!VertGroupA,!Space,!HorizGroupA,!Space,!GroupBox,!ObjectBackfillB
End Macro

Macro BeginRequesterGads
!Space,!EndGroup,!Space
End Macro

Macro EndRequester
!Space,!EndGroup,!EndProject
End Macro


;/* ////////////////////////////////////////////////////////////////////// */
;/* /////////////////////////////////////////////////// Support library // */
;/* ////////////////////////////////////////////////////////////////////// */
;#Application=__Triton_Support_App
;/* ////////////////////////////////////////////////////////////////////// */
;/* //////////////////////////////////////////////// The Triton message // */
;/* ////////////////////////////////////////////////////////////////////// */

NEWTYPE .TR_Message
  *trm_Project.TR_Project
  trm_ID.l  ;/* The object's ID (where appropriate) */
  trm_Class.l ;/* The Triton message class */
  trm_Data.l  ;/* The class-specific data */
  trm_Code.l  ;/* Currently only used by TRMS_KEYPRESSED */
  trm_Qualifier.l ;/* IEQUALIFIERs */
  trm_Seconds.l ;/* \ Copy of system clock time (Only where */
  trm_Micros.l  ;/* / available! If not set, trm_Seconds is 0L) */
  *trm_App.TR_App
End NEWTYPE

;/* Message classes */

#TRMS_CLOSEWINDOW   =1 ; The window should be closed */
#TRMS_ERROR         =2 ; An error occured. Error code in trm_Data */
#TRMS_NEWVALUE      =3 ; Object's value has changed. New value in trm_Data */
#TRMS_ACTION        =4 ; Object has triggered an action */
#TRMS_ICONDROPPED   =5 ; Icon dropped over window (ID=0) or DropBox. AppMessage* in trm_Data */
#TRMS_KEYPRESSED    =6 ; Key pressed. trm_Data contains ASCII code, trm_Code raw code and */
#TRMS_HELP          =7 ; The user requested help for the specified ID */
#TRMS_DISKINSERTED  =8 ; A disk has been inserted into a drive
#TRMS_DISKREMOVED   =9 ; A disk has been removed from a drive

;/* ////////////////////////////////////////////////////////////////////// */
;/* //////////////////////////////////////////////// Triton error codes // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRER_OK              =0 ; No error */
#TRER_ALLOCMEM        =1 ; Not enough memory */
#TRER_OPENWINDOW      =2 ; Can't open window */
#TRER_WINDOWTOOBIG    =3 ; Window would be too big for screen */
#TRER_DRAWINFO        =4 ; Can't get screen's DrawInfo */
#TRER_OPENFONT        =5 ; Can't open font */
#TRER_CREATEMSGPORT   =6 ; Can't create message port */
#TRER_INSTALLOBJECT   =7 ; Can't create an object */
#TRER_CREATECLASS     =8 ; Can't create a class */
#TRER_NOLOCKPUBSCREEN =9 ; Can't lock public screen */
#TRER_CREATEMENUS     =12; Error while creating the menus */
#TRER_GT_CREATECONTEXT=14; Can't create gadget context */
#TRER_MAXERRORNUM     =15; PRIVATE! */

; Object Messages

#TROM_ACTIVATE=23


;/* ////////////////////////////////////////////////////////////////////// */
;/* ///////////////////////////////////////// Tags for TR_OpenProject() // */
;/* ////////////////////////////////////////////////////////////////////// */
;/* Tag bases */

#TRTG_OAT =#TAG_USER+$400 ;/* Object attribute */
#TRTG_OBJ =#TAG_USER+$100 ;/* Object ID */
#TRTG_OAT2=#TAG_USER+$80 ;/* PRIVATE! */
#TRTG_PAT =#TAG_USER      ;/* Project attribute */

;#TRTG_SER(ser)=(ser <<11)
;macro TRTG_SER
;`1 LSL 11
;end macro

;/* Window/Project */
#TRWI_Title=             #TRTG_PAT+$01  ;/* STRPTR: The window title */
#TRWI_Flags=             #TRTG_PAT+$02  ;/* See below for window flags */
#TRWI_Underscore=        #TRTG_PAT+$03  ;/* char *: The underscore for menu and gadget shortcuts */
#TRWI_Position=          #TRTG_PAT+$04  ;/* Window position, see below */
#TRWI_CustomScreen=      #TRTG_PAT+$05  ;/* struct Screen * */
#TRWI_PubScreen=         #TRTG_PAT+$06  ;/* struct Screen *, must have been locked! */
#TRWI_PubScreenName=     #TRTG_PAT+$07  ;/* STRPTR, Triton is doing the locking */
#TRWI_PropFontAttr=      #TRTG_PAT+$08  ;/* struct TextAttr *: The proportional font */
#TRWI_FixedWidthFontAttr=#TRTG_PAT+$09  ;/* struct TextAttr *: The fixed-width font */
#TRWI_Backfill=          #TRTG_PAT+$0A  ;/* The backfill type, see below */
#TRWI_ID=                #TRTG_PAT+$0B  ;/* ULONG: The window ID */
#TRWI_Dimensions=        #TRTG_PAT+$0C  ;/* struct TR_Dimensions * */
#TRWI_ScreenTitle=       #TRTG_PAT+$0D  ;/* STRPTR: The screen title */
#TRWI_QuickHelp=         #TRTG_PAT+$0E  ;   BOO: Quick Help active?

;/* Menus */
#TRMN_Title= #TRTG_PAT+$65  ;/* STRPTR: Menu */
#TRMN_Item=  #TRTG_PAT+$66  ;/* STRPTR: Menu item */
#TRMN_Sub=   #TRTG_PAT+$67  ;/* STRPTR: Menu subitem */
#TRMN_Flags= #TRTG_PAT+$68  ;/* See below for flags */

;/* General object attributes */
#TRAT_ID=      #TRTG_OAT2+$16  ;/* The object's/menu's ID */
#TRAT_Flags=   #TRTG_OAT2+$17  ;/* The object's flags */
#TRAT_Value=   #TRTG_OAT2+$18  ;/* The object's value */
#TRAT_Text=    #TRTG_OAT2+$19  ;/* The object's text */
#TRAT_Disabled=#TRTG_OAT2+$1A  ;/* Disabled object? */
#TRAT_Backfill=#TRTG_OAT2+$1B  ;/* Backfill pattern */
#TRAT_MinWidth=#TRTG_OAT2+$1C  ;/* Minimum width */
#TRAT_MinHeight=#TRTG_OAT2+$1D  ;/* Minimum height */

;/* ////////////////////////////////////////////////////////////////////// */
;/* ////////////////////////////////////////////////////// Window flags // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRWF_BACKDROP          =$00000001 ; Create a backdrop borderless window */
#TRWF_NODRAGBAR         =$00000002 ; Don't use a dragbar */
#TRWF_NODEPTHGADGET     =$00000004 ; Don't use a depth-gadget */
#TRWF_NOCLOSEGADGET     =$00000008 ; Don't use a close-gadget */
#TRWF_NOACTIVATE        =$00000010 ; Don't activate window */
#TRWF_NOESCCLOSE        =$00000020 ; Don't send TRMS_CLOSEWINDOW when Esc is pressed */
#TRWF_NOPSCRFALLBACK    =$00000040 ; Don't fall back onto default PubScreen */
#TRWF_NOZIPGADGET       =$00000080 ; Don't use a zip-gadget */
#TRWF_ZIPCENTERTOP      =$00000100 ; Center the zipped window on the title bar */
#TRWF_NOMINTEXTWIDTH    =$00000200 ; Minimum window width not according to title text */
#TRWF_NOSIZEGADGET      =$00000400 ; Don't use a sizing-gadget */
#TRWF_NOFONTFALLBACK    =$00000800 ; Don't fall back to topaz.8 */
#TRWF_NODELZIP          =$00001000 ; Don't zip the window when Del is pressed */
#TRWF_SIMPLEREFRESH     =$00002000 ; *** OBSOLETE *** (V3+) */
#TRWF_ZIPTOCURRENTPOS   =$00004000 ; Will zip the window at the current position (OS3.0+) */
#TRWF_APPWINDOW         =$00008000 ; Create an AppWindow without using class_dropbox */
#TRWF_ACTIVATESTRGAD    =$00010000 ; Activate the first string gadget after opening the window */
#TRWF_HELP              =$00020000 ; Pressing <Help> will create a TRMS_HELP message */
#TRWF_SYSTEMACTION      =$00040000 ; System status message will be sent (V4)


;/* ////////////////////////////////////////////////////////////////////// */
;/* //////////////////////////////////////////////////////// Menu flags // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRMF_CHECKIT   =$00000001 ; Leave space for a checkmark */
#TRMF_CHECKED   =$00000002 ; Check the item (includes TRMF_CHECKIT) */
#TRMF_DISABLED  =$00000004 ; Ghost the menu/item */


;/* ////////////////////////////////////////////////////////////////////// */
;/* ////////////////////////////////////////////////// Window positions // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRWP_DEFAULT       =0    ; Let Triton choose a good position */
#TRWP_BELOWTITLEBAR =1    ; Left side of screen, below title bar */
#TRWP_CENTERTOP     =1025 ; Top of screen, centered on the title bar */
#TRWP_TOPLEFTSCREEN =1026 ; Top left corner of screen */
#TRWP_CENTERSCREEN  =1027 ; Centered on the screen */
#TRWP_CENTERDISPLAY =1028 ; Centered on the currently displayed clip */
#TRWP_MOUSEPOINTER  =1029 ; Under the mouse pointer */
#TRWP_ABOVECOORDS   =2049 ; Above coordinates from the dimensions struct
#TRWP_BELOWCOORDS   =2050 ; Below coordinates from the dimension struct


;/* ////////////////////////////////////////////////////////////////////// */
;/* //////////////////////////////////// Backfill types / System images // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRBF_WINDOWBACK        =$00000000 ; Window backfill */
#TRBF_REQUESTERBACK     =$00000001 ; Requester backfill */

#TRBF_NONE              =$00000002 ; No backfill (= Fill with BACKGROUNDPEN) */
#TRBF_SHINE             =$00000003 ; Fill with SHINEPEN */
#TRBF_SHINE_SHADOW      =$00000004 ; Fill with SHINEPEN + SHADOWPEN */
#TRBF_SHINE_FILL        =$00000005 ; Fill with SHINEPEN + FILLPEN */
#TRBF_SHINE_BACKGROUND  =$00000006 ; Fill with SHINEPEN + BACKGROUNDPEN */
#TRBF_SHADOW            =$00000007 ; Fill with SHADOWPEN */
#TRBF_SHADOW_FILL       =$00000008 ; Fill with SHADOWPEN + FILLPEN */
#TRBF_SHADOW_BACKGROUND =$00000009 ; Fill with SHADOWPEN + BACKGROUNDPEN */
#TRBF_FILL              =$0000000A ; Fill with FILLPEN */
#TRBF_FILL_BACKGROUND   =$0000000B ; Fill with FILLPEN + BACKGROUNDPEN */

#TRSI_USBUTTONBACK      =$00010002 ; Unselected button backfill */
#TRSI_SBUTTONBACK       =$00010003 ; Selected button backfill */


;/* ////////////////////////////////////////////////////////////////////// */
;/* ////////////////////////////////////////////// Display Object flags // */
;/* ////////////////////////////////////////////////////////////////////// */

;/* General flags */
#TROF_RAISED        =$00000001 ; Raised object */
#TROF_HORIZ         =$00000002 ; Horizontal object \ Works automatically */
#TROF_VERT          =$00000004 ; Vertical object   / in groups */
#TROF_RIGHTALIGN    =$00000008 ; Align object to the right border if available */

;/* Text flags */
#TRTX_NOUNDERSCORE  =$00000100 ; Don't interpret underscores */
#TRTX_HIGHLIGHT     =$00000200 ; Highlight text */
#TRTX_3D            =$00000400 ; 3D design */
#TRTX_BOLD          =$00000800 ; Softstyle 'bold' */
#TRTX_TITLE         =$00001000 ; A title (e.g. of a group) */
#TRTX_SELECTED      =$00002000 ; PRIVATE! */


;/* ////////////////////////////////////////////////////////////////////// */
;/* ////////////////////////////////////////////////////// Menu entries // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRMN_BARLABEL=-1 ;/* A barlabel instead of text */

;/* ////////////////////////////////////////////////////////////////////// */
;/* /////////////////////////////////////////// Tags for TR_CreateApp() // */
;/* ////////////////////////////////////////////////////////////////////// */

#TRCA_Name      =#TAG_USER+1
#TRCA_LongName  =#TAG_USER+2
#TRCA_Info      =#TAG_USER+3
#TRCA_Version   =#TAG_USER+4
#TRCA_Release   =#TAG_USER+5
#TRCA_Date      =#TAG_USER+6

;/* ////////////////////////////////////////////////////////////////////// */
;/* ///////////////////////////////////////// Tags for TR_EasyRequest() // */
;/* ////////////////////////////////////////////////////////////////////// */

#TREZ_ReqPos        =#TAG_USER+1
#TREZ_LockProject   =#TAG_USER+2
#TREZ_Return        =#TAG_USER+3
#TREZ_Title         =#TAG_USER+4
#TREZ_Activate      =#TAG_USER+5

;/* ////////////////////////////////////////////////////////////////////// */
;/* ///////////////////////////////////////// The Application Structure // */
;/* ////////////////////////////////////////////////////////////////////// */

NEWTYPE .TR_App
  *tra_MemPool.w
  tra_BitMask.l ;/* Bits to Wait() for */
  tra_LastError.l ;/* TRER code of last error */
  tra_Name.l  ;/* Unique name */
  tra_LongName.l  ;/* User-readable name */
  tra_Info.l  ;/* Info string */
  tra_Version.l ;/* Version */
  tra_Release.l ;/* Release */
  tra_Date.l  ;/* Compilation date */
  *tra_AppPort.MsgPort
  *tra_IDCMPPort.MsgPort
  *tra_Prefs.w
  *tra_LastProject.TR_Project
  *tra_InputEvent.InputEvent
End NEWTYPE


;/* ////////////////////////////////////////////////////////////////////// */
;/* ////////////////////////////////////////// The Dimensions Structure // */
;/* ////////////////////////////////////////////////////////////////////// */

NEWTYPE .TR_Dimensions
  trd_Left.w  ;/* Left */
  trd_Top.w ;/* Top */
  trd_Width.w ;/* Width */
  trd_Height.w  ;/* Height */
  trd_Left2.w ;/* Left */
  trd_Top2.w  ;/* Top */
  trd_Width2.w  ;/* Width */
  trd_Height2.w ;/* Height */
  trd_Zoomed.w  ;/* Window zoomed? */
  reserved.w[3] ;/* For future expansions */
End NEWTYPE


;/* ////////////////////////////////////////////////////////////////////// */
;/* ///////////////////////////////////////////// The Project Structure // */
;/* ////////////////////////////////////////////////////////////////////// */

NEWTYPE .TR_Project  ;;;;;;;; PRIVATE!!!! ;;;;;;;;
  *trp_App.TR_App
  *trp_Screen.Screen
  trp_ScreenType.l          ; Type of screen (WA_...Screen)
  trp_ID.l                  ;Project's ID
  *trp_LockedPubScreen.Screen
  trp_ScreenTitle.l         ; The screen title */
  *trp_Window.Window
  *trp_AppWindow.AppWindow
  trp_IDCMPFlags.l          ; The IDCMP flags */
  trp_Flags.l               ; Triton window flags */
  *trp_NewMenu.NewMenu
  trp_NewMenuSize.l         ; The number of menu items in the list */
  *trp_Menu.Menu
  trp_NextSelect.w          ; The next selected menu item */
  *trp_VisualInfo.w
  *trp_DrawInfo.DrawInfo
  *trp_UserDimensions.TR_Dimensions
  *trp_Dimensions.TR_Dimensions
  trp_WindowStdHeight.l     ; The standard height of the window */
  trp_LeftBorder.l          ; The width of the left window border */
  trp_RightBorder.l         ; The width of the right window border */
  trp_TopBorder.l           ; The height of the top window border */
  trp_BottomBorder.l        ; The height of the bottom window border */
  trp_InnerWidth.l          ; The inner width of the window */
  trp_InnerHeight.l         ; The inner height of the window */
  trp_ZipDimensions.w[4]    ; The dimensions for the zipped window */
  trp_AspectFixing.w        ; Pixel aspect correction factor */
  trp_ObjectList.MinList    ; The list of display objects */
  trp_MenuList.MinList      ; The list of menus */
  trp_IDList.MinList        ; The ID linking list (menus & objects) */
  *trp_MemPool.w
  trp_HasObjects.w          ; Do we have display objects ? */
  *trp_PropAttr.TextAttr
  *trp_FixedWidthAttr.TextAttr
  *trp_PropFont.TextFont
  *trp_FixedWidthFont.TextFont
  trp_OpenedPropFont.w      ; \ Have we opened the fonts ? */
  trp_OpenedFixedWidthFont.w; /                            */
  trp_TotalPropFontHeight.w ; Height of prop font incl. underscore */
  trp_BackfillType.l        ; The backfill type */
  *trp_BackfillHook.Hook
  *trp_GadToolsGadgetList.Gadget
  *trp_PrevGadget.Gadget
  *trp_NewGadget.NewGadget
  *trp_InvisibleRequest.Requester
  trp_IsUserLocked.w        ; Project locked by the user? */
  trp_CurrentID.l           ; The currently keyboard-selected ID */
  trp_IsCancelDown.w        ; Cancellation key pressed? */
  trp_IsShortcutDown.w      ; Shortcut key pressed? */
  trp_Underscore.b          ; The underscore character */
  trp_EscClose.w            ; Close window on Esc ? */
  trp_DelZip.w              ; Zip window on Del ? */
  trp_PubScreenFallBack.w   ; Fall back onto default public screen ? */
  trp_FontFallBack.w        ; Fall back to topaz.8 ? */
  trp_OldWidth.w            ; Old window width */
  trp_OldHeight.w           ; Old window height */

  *trp_QuickHelpWindow.Window
;  *trp_QuickHelpObject.#TROD_DisplayObject
  trp_TicksPassed.l
End NEWTYPE


;/* ////////////////////////////////////////////////////////////////////// */
;/* ///////////////////////////// Default classes, attributes and flags // */
;/* ////////////////////////////////////////////////////////////////////// */
;** The following code has been assembled automatically from the class
;   sources and may therefore look somehow unstructured and chaotic ;) **

;/* class_DisplayObject */
#TROB_DisplayObject  =#TRTG_OBJ+$3C  ;/* A basic display object */

#TRDO_QuickHelpString=#TRTG_OAT+$1E3

;/* class_Group */
#TRGR_Horiz=#TAG_USER+201   ;/* Horizontal group */
#TRGR_Vert= #TAG_USER+202   ;/* Vertical group */
#TRGR_End=  #TRTG_OAT2+$4B ;/* End of a group */

#TRGR_PROPSHARE =$00000000  ;/* Default: Divide objects proportionally */
#TRGR_EQUALSHARE=$00000001  ;/* Divide objects equally */
#TRGR_PROPSPACES=$00000002 ;/* Divide spaces proportionally */
#TRGR_ARRAY     =$00000004  ;/* Top-level array group */

#TRGR_ALIGN     =$00000008  ;/* Align resizeable objects in secondary dimension */
#TRGR_CENTER    =$00000010 ;/* Center unresizeable objects in secondary dimension */

#TRGR_FIXHORIZ  =$00000020 ;/* Don't allow horizontal resizing */
#TRGR_FIXVERT   =$00000040  ;/* Don't allow vertical resizing */
#TRGR_INDEP     =$00000080  ;/* Group is independant of surrounding array */

;/* class_Space */
#TROB_Space =#TRTG_OBJ+$285       ;/* The spaces class */
#TRST_NONE  =1                     ;/* No space */
#TRST_SMALL =2                    ;/* Small space */
#TRST_NORMAL=3                   ;/* Normal space (default) */
#TRST_BIG   =4                      ;/* Big space */

;/* class_CheckBox */
#TROB_CheckBox=#TRTG_OBJ+$2F ; /* A checkbox gadget */

;/* class_Object */
#TROB_Object=#TRTG_OBJ+$3D   ;/* A rootclass object */

;/* class_Cycle */
#TROB_Cycle      =#TRTG_OBJ+$36    ;/* A cycle gadget */

#TRCY_MX         =$00010000           ;/* Unfold the cycle gadget to a MX gadget */
#TRCY_RIGHTLABELS=$00020000  ;/* Put the labels to the right of a MX gadget */

;/* class_DropBox */
#TROB_DropBox=#TRTG_OBJ+$38  ;/* An icon drop box */

;/* class_Scroller */
#TROB_Scroller=#TRTG_OBJ+$35  ;/* A scroller gadget */

#TRSC_Total=#TRTG_OAT+$1E0
#TRSC_Visible=#TRTG_OAT+$1E1

;/* class_FrameBox */
#TROB_FrameBox=#TRTG_OBJ+$32 ;/* A framing box */

#TRFB_GROUPING=$00000001     ;/* A grouping box */
#TRFB_FRAMING=$00000002      ;/* A framing box */
#TRFB_TEXT=$00000004         ;/* A text container */

;/* class_Button */
#TROB_Button    =#TRTG_OBJ+$31 ;/* A BOOPSI button gadget */

#TRBU_RETURNOK  =$00010000  ;/* <Return> answers the button */
#TRBU_ESCOK     =$00020000  ;/* <Esc> answers the button */
#TRBU_SHIFTED   =$00040000  ;/* Shifted shortcut only */
#TRBU_UNSHIFTED =$00080000  ;/* Unshifted shortcut only */
#TRBU_YRESIZE   =$00100000  ;/* Button resizeable in Y direction */
#TRBT_TEXT      =0          ;/* Text button */
#TRBT_GETFILE   =1          ;/* GetFile button */
#TRBT_GETDRAWER =2          ;/* GetDrawer button */
#TRBT_GETENTRY  =3          ;/* GetEntry button */

;/* class_Line */
#TROB_Line=#TRTG_OBJ+$2D      ;/* A simple line */

;/* class_Palette */
#TROB_Palette=#TRTG_OBJ+$33   ;/* A palette gadget */

;/* class_Slider */
#TROB_Slider=#TRTG_OBJ+$34 ;/* A slider gadget */

#TRSL_Min=#TRTG_OAT+$1DE
#TRSL_Max=#TRTG_OAT+$1DF

;/* class_Progress */
#TROB_Progress=#TRTG_OBJ+$3A         ;/* A progress indicator */

;/* class_Text */
#TROB_Text=#TRTG_OBJ+$30 ;/* A line of text */

#TRTX_CLIPPED=$00010000

;/* class_Listview */
#TROB_Listview=#TRTG_OBJ+$39    ;/* A listview gadget */

#TRLV_Top           =#TRTG_OAT+$1E2

#TRLV_READONLY      =$10000 ;/* A read-only list */
#TRLV_SELECT        =$20000 ;/* You may select an entry */
#TRLV_SHOWSELECTED  =$40000 ;/* Selected entry will be shown */
#TRLV_NOCURSORKEYS  =$80000 ;/* Don't use arrow keys */
#TRLV_NONUMPADKEYS  =$100000 ;/* Don't use numeric keypad keys */
#TRLV_FWFONT        =$200000 ;/* Use the fixed-width font */
#TRLV_NOGAP         =$400000  ;/* Don't leave a gap below the list */

;/* class_String */
#TROB_String=#TRTG_OBJ+$37   ;/* A string gadget */

#TRST_INVISIBLE        =$00010000
#TRST_NORETURNBROADCAST=$00020000

;/* class_Image */
#TROB_Image =#TRTG_OBJ+$3B    ;/* An image */
#TRIM_BOOPSI=$00010000       ;/* Use a BOOPSI IClass image */

;/* End of automatically assembled code */ ; NOT FOR BLITZ IT AIN'T !

;/* ////////////////////////////////////////////////////////////////////// */
;/* /////////////////////////////////////////////////////////// The End // */
;/* ////////////////////////////////////////////////////////////////////// */

; This newtype is needed for the project taglist. See demo listings and the
; documentation for more.

NEWTYPE .taggies
a1.l:b1.l:c1.l:d1.l:e1.l:f1.l:g1.l:h1.l:i1.l:j1.l:k1.l:l1.l:m1.l:n1.l:o1.l:p1.l:q1.l:r1.l:s1.l:t1.l:u1.l:v1.l
w1.l:x1.l:y1.l:z1.l
a2.l:b2.l:c2.l:d2.l:e2.l:f2.l:g2.l:h2.l:i2.l:j2.l:k2.l:l2.l:m2.l:n2.l:o2.l:p2.l:q2.l:r2.l:s2.l:t2.l:u2.l:v2.l
w2.l:x2.l:y2.l:z2.l
a3.l:b3.l:c3.l:d3.l:e3.l:f3.l:g3.l:h3.l:i3.l:j3.l:k3.l:l3.l:m3.l:n3.l:o3.l:p3.l:q3.l:r3.l:s3.l:t3.l:u3.l:v3.l
w3.l:x3.l:y3.l:z3.l
a4.l:b4.l:c4.l:d4.l:e4.l:f4.l:g4.l:h4.l:i4.l:j4.l:k4.l:l4.l:m4.l:n4.l:o4.l:p4.l:q4.l:r4.l:s4.l:t4.l:u4.l:v4.l
w4.l:x4.l:y4.l:z4.l
End NEWTYPE